﻿Public Class ServicioNegocio


    Public Function insertar(ByVal idUsuario As String, ByVal idVenta As Integer, ByVal descripcion As String) As Servicio

        Dim omen As New Servicio()
        omen.idUsuario = idUsuario
        omen.idventa = idVenta
        omen.descripcion = descripcion

        Dim dao As New ServicioDAO
        Return dao.insertar(omen)
    End Function

    Public Function listar() As Collection
        Dim omen As New ServicioDAO
        Return omen.listar()
    End Function

    Public Sub eliminar(ByVal idServicio As Integer)
        Dim dao As New ServicioDAO
        dao.eliminar(idServicio)
    End Sub




End Class
